home *** CD-ROM | disk | FTP | other *** search
/ Quick PC 62 / Quick PC 62.iso / I386 / IIS5_01.CAB / IIS_PopulateForm_VBScript.asp < prev    next >
Encoding:
Text File  |  1998-05-29  |  1.4 KB  |  54 lines

  1. <%@ LANGUAGE = VBScript %>
  2. <% Option Explicit %>
  3.  
  4. <!*************************
  5. This sample is provided for educational purposes only. It is not intended to be 
  6. used in a production environment, has not been tested in a production environment, 
  7. and Microsoft will not provide technical support for it. 
  8. *************************>
  9.  
  10. <% 
  11.     'Create and set variables that will be used in populating
  12.     'the form.  In a typical application, these values would come
  13.     'from a database or text file.
  14.  
  15.     Dim strFirstName
  16.     Dim strLastName
  17.     Dim strAddress1
  18.     Dim strAddress2
  19.     Dim blnInfo
  20.  
  21.     strFirstName = "John"
  22.     strLastName = "Doe"
  23.     strAddress1 = "1 Main Street"
  24.     strAddress2 = "Nowhere ZA, 12345"
  25. %>
  26.  
  27. <HTML>
  28.     <HEAD>
  29.         <TITLE>PopulateForm Sample</TITLE>
  30.     </HEAD>
  31.  
  32.     <BODY BGCOLOR="White" TOPMARGIN="10" LEFTMARGIN="10">
  33.  
  34.  
  35.         <!-- Display header. -->
  36.  
  37.         <FONT SIZE="4" FACE="ARIAL, HELVETICA">
  38.         <B>PopulateForm Sample</B></FONT><BR>
  39.       
  40.         <HR SIZE="1" COLOR="#000000">
  41.  
  42.  
  43.         <FORM ACTION="">
  44.         
  45.         <!-- Use ASP variables to fill out the form. -->
  46.  
  47.         <P>First Name: <INPUT TYPE="TEXT" NAME="FNAME" VALUE="<%= strFirstName %>"></P>
  48.         <P>Last Name: <INPUT TYPE="TEXT" NAME="LNAME" VALUE="<%= strLastName %>"></P>
  49.         <P>Street: <INPUT TYPE="TEXT" NAME="STREET" VALUE="<%= strAddress1 %>"></P>
  50.         <P>City State, Zip: <INPUT TYPE="TEXT" NAME="FNAME" VALUE="<%= strAddress2 %>"></P>    
  51.  
  52.     </BODY>
  53. </HTML>
  54.